﻿Public Class BEVaga
  Private _titulo As String
  Private _id As Integer
  Private _codigo As String
  Private _descricao As String
  Private _candidatos As IList(Of BECandidato)
  Private _areaVaga As AreaVaga
  Private _prova As BEProva
  Private _estado As Integer
  Private _dataCadastro As Date
  Private _qtdeCandidatos As Integer

  Sub New()
    _id = 0
    _titulo = ""
    _codigo = ""
    _descricao = ""
    _areaVaga = 0
    _prova = New BEProva(0)
    _estado = -1
    _dataCadastro = Nothing
  End Sub

  Sub New(ByVal intId As Integer)
    Me.New()
    _id = intId
  End Sub

  Public Property DataCadastro() As Date
    Get
      Return _dataCadastro
    End Get
    Set(ByVal value As Date)
      _dataCadastro = value
    End Set
  End Property

  Public Property AreaVaga() As AreaVaga
    Get
      Return _areaVaga
    End Get
    Set(ByVal value As AreaVaga)
      _areaVaga = value
    End Set
  End Property

  Public Property Candidatos() As IList(Of BECandidato)
    Get
      Return _candidatos
    End Get
    Set(ByVal value As IList(Of BECandidato))
      _candidatos = value
    End Set
  End Property

  Public Property Codigo() As String
    Get
      Return _codigo
    End Get
    Set(ByVal value As String)
      _codigo = value
    End Set
  End Property

  Public Property Descricao() As String
    Get
      Return _descricao
    End Get
    Set(ByVal value As String)
      _descricao = value
    End Set
  End Property

  Public Property Titulo() As String
    Get
      Return _titulo
    End Get
    Set(ByVal value As String)
      _titulo = value
    End Set
  End Property

  Public Property Estado() As Integer
    Get
      Return _estado
    End Get
    Set(ByVal value As Integer)
      _estado = value
    End Set
  End Property

  Public Property Id() As Integer
    Get
      Return _id
    End Get
    Set(ByVal value As Integer)
      _id = value
    End Set
  End Property

  Public Property Prova() As BEProva
    Get
      Return _prova
    End Get
    Set(ByVal value As BEProva)
      _prova = value
    End Set
  End Property

  Public Property QtdeCandidatos() As Integer
    Get
      Return _qtdeCandidatos
    End Get
    Set(ByVal value As Integer)
      _qtdeCandidatos = value
    End Set
  End Property

End Class

